home *** CD-ROM | disk | FTP | other *** search
/ Language/OS - Multiplatform Resource Library / LANGUAGE OS.iso / icon / packages.lha / packages / atari / ats.arc / STAND.ARC / PROTO.UX < prev    next >
Text File  |  1990-03-28  |  22KB  |  1,212 lines

  1. 0:    6
  2.     36
  3.     Z+36
  4.     0
  5.     0
  6.     0
  7.     0
  8.     4    I+0            # main
  9. 36:    68                # pfail
  10. 40:    6
  11.     100
  12.     Z+140
  13.     2
  14.     5
  15.     1
  16.     0
  17.     5    I+46            # expr1
  18.     1    I+80            # a
  19.     1    I+82            # b
  20.     1    I+20            # x
  21.     1    I+22            # y
  22.     1    I+24            # z
  23.     1    I+87            # i
  24.     1    I+89            # j
  25.     2    I+84            # e1
  26. 140:    59    L1            # init
  27. 148:    67    L1            # mark
  28. 156:    69                # pnull
  29. 160:    82    0            # static
  30. 168:    60    0            # int
  31. 176:    1                # asgn
  32. 180:    78                # unmark
  33. L1:
  34. 184:    67    L2            # mark
  35. 192:    69                # pnull
  36. 196:    78                # unmark
  37. L2:
  38. 200:    67    L3            # mark
  39. 208:    69                # pnull
  40. 212:    78                # unmark
  41. L3:
  42. 216:    67    L4            # mark
  43. 224:    69                # pnull
  44. 228:    78                # unmark
  45. L4:
  46. 232:    67    L5            # mark
  47. 240:    69                # pnull
  48. 244:    78                # unmark
  49. L5:
  50. 248:    67    L6            # mark
  51. 256:    69                # pnull
  52. 260:    65    0            # llist
  53. 268:    78                # unmark
  54. L6:
  55. 272:    67    L7            # mark
  56. 280:    69                # pnull
  57. 284:    69                # pnull
  58. 288:    69                # pnull
  59. 292:    65    2            # llist
  60. 300:    78                # unmark
  61. L7:
  62. 304:    67    L8            # mark
  63. 312:    69                # pnull
  64. 316:    83    0            # local
  65. 324:    57    1            # field
  66. 332:    78                # unmark
  67. L8:
  68. 336:    67    L9            # mark
  69. 344:    69                # pnull
  70. 348:    83    0            # local
  71. 356:    83    3            # local
  72. 364:    38                # subsc
  73. 368:    78                # unmark
  74. L9:
  75. 372:    67    L10            # mark
  76. 380:    69                # pnull
  77. 384:    83    0            # local
  78. 392:    83    3            # local
  79. 400:    83    4            # local
  80. 408:    36                # sect
  81. 412:    78                # unmark
  82. L10:
  83. 416:    67    L11            # mark
  84. 424:    69                # pnull
  85. 428:    83    0            # local
  86. 436:    83    3            # local
  87. 444:    52                # dup
  88. 448:    83    4            # local
  89. 456:    30                # plus
  90. 460:    36                # sect
  91. 464:    78                # unmark
  92. L11:
  93. 468:    67    L12            # mark
  94. 476:    69                # pnull
  95. 480:    83    0            # local
  96. 488:    83    3            # local
  97. 496:    52                # dup
  98. 500:    83    4            # local
  99. 508:    16                # minus
  100. 512:    36                # sect
  101. 516:    78                # unmark
  102. L12:
  103. 520:    67    L13            # mark
  104. 528:    74                # pushn1
  105. 532:    69                # pnull
  106. 536:    69                # pnull
  107. 540:    69                # pnull
  108. 544:    69                # pnull
  109. 548:    61    4            # invoke
  110. 556:    78                # unmark
  111. L13:
  112. 560:    67    L14            # mark
  113. 568:    83    0            # local
  114. 576:    69                # pnull
  115. 580:    69                # pnull
  116. 584:    69                # pnull
  117. 588:    69                # pnull
  118. 592:    61    4            # invoke
  119. 600:    78                # unmark
  120. L14:
  121. 604:    67    L15            # mark
  122. 612:    83    0            # local
  123. 620:    83    1            # local
  124. 628:    89                # apply
  125. 632:    78                # unmark
  126. L15:
  127. 636:    67    L16            # mark
  128. 644:    67    L17            # mark
  129. 652:    83    0            # local
  130. 660:    78                # unmark
  131. 664:    53                # efail
  132. L17:
  133. 668:    69                # pnull
  134. 672:    78                # unmark
  135. L16:
  136. 676:    67    L18            # mark
  137. L19:
  138. 684:    85                # mark0
  139. 688:    83    0            # local
  140. 696:    46    L19            # chfail
  141. 704:    56                # esusp
  142. 708:    78                # unmark
  143. L18:
  144. 712:    67    L20            # mark
  145. 720:    69                # pnull
  146. 724:    83    0            # local
  147. 732:    2                # bang
  148. 736:    78                # unmark
  149. L20:
  150. 740:    67    L21            # mark
  151. 748:    69                # pnull
  152. 752:    83    0            # local
  153. 760:    37                # size
  154. 764:    78                # unmark
  155. L21:
  156. 768:    67    L22            # mark
  157. 776:    69                # pnull
  158. 780:    83    0            # local
  159. 788:    23                # number
  160. 792:    78                # unmark
  161. L22:
  162. 796:    67    L23            # mark
  163. 804:    69                # pnull
  164. 808:    83    0            # local
  165. 816:    19                # neg
  166. 820:    78                # unmark
  167. L23:
  168. 824:    69                # pnull
  169. 828:    68                # pfail
  170. 832:    6
  171.     140
  172.     Z+972
  173.     -2
  174.     11
  175.     0
  176.     1
  177.     5    I+52            # expr2
  178.     1    I+80            # a
  179.     1    I+82            # b
  180.     1    I+20            # x
  181.     1    I+87            # i
  182.     1    I+22            # y
  183.     1    I+89            # j
  184.     2    I+91            # c1
  185.     2    I+94            # c2
  186.     2    I+97            # s1
  187.     2    I+100            # s2
  188.     2    I+103            # a1
  189.     2    I+106            # a2
  190.     1    I+109            # k
  191. 972:    67    L1            # mark
  192. 980:    69                # pnull
  193. 984:    83    0            # local
  194. 992:    43                # value
  195. 996:    78                # unmark
  196. L1:
  197. 1000:    67    L2            # mark
  198. 1008:    69                # pnull
  199. 1012:    83    0            # local
  200. 1020:    22                # null
  201. 1024:    78                # unmark
  202. L2:
  203. 1028:    67    L3            # mark
  204. 1036:    69                # pnull
  205. 1040:    83    0            # local
  206. 1048:    40                # tabmat
  207. 1052:    78                # unmark
  208. L3:
  209. 1056:    67    L4            # mark
  210. 1064:    69                # pnull
  211. 1068:    83    0            # local
  212. 1076:    32                # random
  213. 1080:    78                # unmark
  214. L4:
  215. 1084:    67    L5            # mark
  216. 1092:    69                # pnull
  217. 1096:    83    0            # local
  218. 1104:    21                # nonnull
  219. 1108:    78                # unmark
  220. L5:
  221. 1112:    67    L6            # mark
  222. 1120:    69                # pnull
  223. 1124:    83    0            # local
  224. 1132:    4                # compl
  225. 1136:    78                # unmark
  226. L6:
  227. 1140:    67    L7            # mark
  228. 1148:    69                # pnull
  229. 1152:    83    0            # local
  230. 1160:    47                # coact
  231. 1164:    78                # unmark
  232. L7:
  233. 1168:    67    L8            # mark
  234. 1176:    69                # pnull
  235. 1180:    83    0            # local
  236. 1188:    34                # refresh
  237. 1192:    78                # unmark
  238. L8:
  239. 1196:    67    L9            # mark
  240. 1204:    83    1            # local
  241. 1212:    63                # limit
  242. 1216:    83    0            # local
  243. 1224:    66                # lsusp
  244. 1228:    78                # unmark
  245. L9:
  246. 1232:    67    L10            # mark
  247. 1240:    83    0            # local
  248. 1248:    83    2            # local
  249. 1256:    47                # coact
  250. 1260:    78                # unmark
  251. L10:
  252. 1264:    67    L11            # mark
  253. 1272:    69                # pnull
  254. 1276:    83    1            # local
  255. 1284:    83    3            # local
  256. 1292:    31                # power
  257. 1296:    78                # unmark
  258. L11:
  259. 1300:    67    L12            # mark
  260. 1308:    69                # pnull
  261. 1312:    83    1            # local
  262. 1320:    83    3            # local
  263. 1328:    18                # mult
  264. 1332:    78                # unmark
  265. L12:
  266. 1336:    67    L13            # mark
  267. 1344:    69                # pnull
  268. 1348:    83    1            # local
  269. 1356:    83    3            # local
  270. 1364:    6                # div
  271. 1368:    78                # unmark
  272. L13:
  273. 1372:    67    L14            # mark
  274. 1380:    69                # pnull
  275. 1384:    83    1            # local
  276. 1392:    83    3            # local
  277. 1400:    17                # mod
  278. 1404:    78                # unmark
  279. L14:
  280. 1408:    67    L15            # mark
  281. 1416:    69                # pnull
  282. 1420:    83    4            # local
  283. 1428:    83    5            # local
  284. 1436:    8                # inter
  285. 1440:    78                # unmark
  286. L15:
  287. 1444:    67    L16            # mark
  288. 1452:    69                # pnull
  289. 1456:    83    1            # local
  290. 1464:    83    3            # local
  291. 1472:    30                # plus
  292. 1476:    78                # unmark
  293. L16:
  294. 1480:    67    L17            # mark
  295. 1488:    69                # pnull
  296. 1492:    83    1            # local
  297. 1500:    83    3            # local
  298. 1508:    16                # minus
  299. 1512:    78                # unmark
  300. L17:
  301. 1516:    67    L18            # mark
  302. 1524:    69                # pnull
  303. 1528:    83    4            # local
  304. 1536:    83    5            # local
  305. 1544:    42                # unions
  306. 1548:    78                # unmark
  307. L18:
  308. 1552:    67    L19            # mark
  309. 1560:    69                # pnull
  310. 1564:    83    4            # local
  311. 1572:    83    5            # local
  312. 1580:    5                # diff
  313. 1584:    78                # unmark
  314. L19:
  315. 1588:    67    L20            # mark
  316. 1596:    69                # pnull
  317. 1600:    83    6            # local
  318. 1608:    83    7            # local
  319. 1616:    3                # cat
  320. 1620:    78                # unmark
  321. L20:
  322. 1624:    67    L21            # mark
  323. 1632:    69                # pnull
  324. 1636:    83    8            # local
  325. 1644:    83    9            # local
  326. 1652:    9                # lconcat
  327. 1656:    78                # unmark
  328. L21:
  329. 1660:    67    L22            # mark
  330. 1668:    69                # pnull
  331. 1672:    83    1            # local
  332. 1680:    83    3            # local
  333. 1688:    28                # numlt
  334. 1692:    78                # unmark
  335. L22:
  336. 1696:    67    L23            # mark
  337. 1704:    69                # pnull
  338. 1708:    83    1            # local
  339. 1716:    83    3            # local
  340. 1724:    27                # numle
  341. 1728:    78                # unmark
  342. L23:
  343. 1732:    67    L24            # mark
  344. 1740:    69                # pnull
  345. 1744:    83    1            # local
  346. 1752:    83    3            # local
  347. 1760:    24                # numeq
  348. 1764:    78                # unmark
  349. L24:
  350. 1768:    67    L25            # mark
  351. 1776:    69                # pnull
  352. 1780:    83    1            # local
  353. 1788:    83    3            # local
  354. 1796:    25                # numge
  355. 1800:    78                # unmark
  356. L25:
  357. 1804:    67    L26            # mark
  358. 1812:    69                # pnull
  359. 1816:    83    1            # local
  360. 1824:    83    3            # local
  361. 1832:    26                # numgt
  362. 1836:    78                # unmark
  363. L26:
  364. 1840:    67    L27            # mark
  365. 1848:    69                # pnull
  366. 1852:    83    1            # local
  367. 1860:    83    3            # local
  368. 1868:    29                # numne
  369. 1872:    78                # unmark
  370. L27:
  371. 1876:    67    L28            # mark
  372. 1884:    69                # pnull
  373. 1888:    83    6            # local
  374. 1896:    83    7            # local
  375. 1904:    14                # lexlt
  376. 1908:    78                # unmark
  377. L28:
  378. 1912:    67    L29            # mark
  379. 1920:    69                # pnull
  380. 1924:    83    6            # local
  381. 1932:    83    7            # local
  382. 1940:    10                # lexeq
  383. 1944:    78                # unmark
  384. L29:
  385. 1948:    67    L30            # mark
  386. 1956:    69                # pnull
  387. 1960:    83    6            # local
  388. 1968:    83    7            # local
  389. 1976:    11                # lexge
  390. 1980:    78                # unmark
  391. L30:
  392. 1984:    67    L31            # mark
  393. 1992:    69                # pnull
  394. 1996:    83    6            # local
  395. 2004:    83    7            # local
  396. 2012:    12                # lexgt
  397. 2016:    78                # unmark
  398. L31:
  399. 2020:    67    L32            # mark
  400. 2028:    69                # pnull
  401. 2032:    83    6            # local
  402. 2040:    83    7            # local
  403. 2048:    15                # lexne
  404. 2052:    78                # unmark
  405. L32:
  406. 2056:    67    L33            # mark
  407. 2064:    69                # pnull
  408. 2068:    83    0            # local
  409. 2076:    83    2            # local
  410. 2084:    7                # eqv
  411. 2088:    78                # unmark
  412. L33:
  413. 2092:    67    L34            # mark
  414. 2100:    69                # pnull
  415. 2104:    83    0            # local
  416. 2112:    83    2            # local
  417. 2120:    20                # neqv
  418. 2124:    78                # unmark
  419. L34:
  420. 2128:    67    L35            # mark
  421. 2136:    67    L36            # mark
  422. 2144:    83    0            # local
  423. 2152:    56                # esusp
  424. 2156:    58    L37            # goto
  425. L36:
  426. 2164:    83    2            # local
  427. L37:
  428. 2172:    78                # unmark
  429. L35:
  430. 2176:    67    L38            # mark
  431. 2184:    69                # pnull
  432. 2188:    83    1            # local
  433. 2196:    83    3            # local
  434. 2204:    73                # push1
  435. 2208:    41                # toby
  436. 2212:    78                # unmark
  437. L38:
  438. 2216:    67    L39            # mark
  439. 2224:    69                # pnull
  440. 2228:    83    1            # local
  441. 2236:    83    3            # local
  442. 2244:    83    10            # local
  443. 2252:    41                # toby
  444. 2256:    78                # unmark
  445. L39:
  446. 2260:    67    L40            # mark
  447. 2268:    69                # pnull
  448. 2272:    83    0            # local
  449. 2280:    83    2            # local
  450. 2288:    1                # asgn
  451. 2292:    78                # unmark
  452. L40:
  453. 2296:    67    L41            # mark
  454. 2304:    69                # pnull
  455. 2308:    83    0            # local
  456. 2316:    83    2            # local
  457. 2324:    33                # rasgn
  458. 2328:    78                # unmark
  459. L41:
  460. 2332:    67    L42            # mark
  461. 2340:    69                # pnull
  462. 2344:    83    0            # local
  463. 2352:    83    2            # local
  464. 2360:    39                # swap
  465. 2364:    78                # unmark
  466. L42:
  467. 2368:    67    L43            # mark
  468. 2376:    69                # pnull
  469. 2380:    83    0            # local
  470. 2388:    83    2            # local
  471. 2396:    35                # rswap
  472. 2400:    78                # unmark
  473. L43:
  474. 2404:    67    L44            # mark
  475. 2412:    69                # pnull
  476. 2416:    83    1            # local
  477. 2424:    52                # dup
  478. 2428:    83    3            # local
  479. 2436:    30                # plus
  480. 2440:    1                # asgn
  481. 2444:    78                # unmark
  482. L44:
  483. 2448:    67    L45            # mark
  484. 2456:    69                # pnull
  485. 2460:    83    1            # local
  486. 2468:    52                # dup
  487. 2472:    83    3            # local
  488. 2480:    16                # minus
  489. 2484:    1                # asgn
  490. 2488:    78                # unmark
  491. L45:
  492. 2492:    67    L46            # mark
  493. 2500:    69                # pnull
  494. 2504:    83    1            # local
  495. 2512:    52                # dup
  496. 2516:    83    3            # local
  497. 2524:    18                # mult
  498. 2528:    1                # asgn
  499. 2532:    78                # unmark
  500. L46:
  501. 2536:    69                # pnull
  502. 2540:    68                # pfail
  503. 2544:    6
  504.     124
  505.     Z+2668
  506.     0
  507.     11
  508.     0
  509.     1
  510.     5    I+58            # expr3
  511.     1    I+87            # i
  512.     1    I+89            # j
  513.     2    I+91            # c1
  514.     2    I+94            # c2
  515.     2    I+97            # s1
  516.     2    I+100            # s2
  517.     2    I+103            # a1
  518.     2    I+106            # a2
  519.     1    I+20            # x
  520.     1    I+22            # y
  521.     1    I+111            # s
  522. 2668:    67    L1            # mark
  523. 2676:    69                # pnull
  524. 2680:    83    0            # local
  525. 2688:    52                # dup
  526. 2692:    83    1            # local
  527. 2700:    6                # div
  528. 2704:    1                # asgn
  529. 2708:    78                # unmark
  530. L1:
  531. 2712:    67    L2            # mark
  532. 2720:    69                # pnull
  533. 2724:    83    0            # local
  534. 2732:    52                # dup
  535. 2736:    83    1            # local
  536. 2744:    17                # mod
  537. 2748:    1                # asgn
  538. 2752:    78                # unmark
  539. L2:
  540. 2756:    67    L3            # mark
  541. 2764:    69                # pnull
  542. 2768:    83    0            # local
  543. 2776:    52                # dup
  544. 2780:    83    1            # local
  545. 2788:    31                # power
  546. 2792:    1                # asgn
  547. 2796:    78                # unmark
  548. L3:
  549. 2800:    67    L4            # mark
  550. 2808:    69                # pnull
  551. 2812:    83    0            # local
  552. 2820:    52                # dup
  553. 2824:    83    1            # local
  554. 2832:    28                # numlt
  555. 2836:    1                # asgn
  556. 2840:    78                # unmark
  557. L4:
  558. 2844:    67    L5            # mark
  559. 2852:    69                # pnull
  560. 2856:    83    0            # local
  561. 2864:    52                # dup
  562. 2868:    83    1            # local
  563. 2876:    27                # numle
  564. 2880:    1                # asgn
  565. 2884:    78                # unmark
  566. L5:
  567. 2888:    67    L6            # mark
  568. 2896:    69                # pnull
  569. 2900:    83    0            # local
  570. 2908:    52                # dup
  571. 2912:    83    1            # local
  572. 2920:    24                # numeq
  573. 2924:    1                # asgn
  574. 2928:    78                # unmark
  575. L6:
  576. 2932:    67    L7            # mark
  577. 2940:    69                # pnull
  578. 2944:    83    0            # local
  579. 2952:    52                # dup
  580. 2956:    83    1            # local
  581. 2964:    25                # numge
  582. 2968:    1                # asgn
  583. 2972:    78                # unmark
  584. L7:
  585. 2976:    67    L8            # mark
  586. 2984:    69                # pnull
  587. 2988:    83    0            # local
  588. 2996:    52                # dup
  589. 3000:    83    1            # local
  590. 3008:    29                # numne
  591. 3012:    1                # asgn
  592. 3016:    78                # unmark
  593. L8:
  594. 3020:    67    L9            # mark
  595. 3028:    69                # pnull
  596. 3032:    83    2            # local
  597. 3040:    52                # dup
  598. 3044:    83    3            # local
  599. 3052:    42                # unions
  600. 3056:    1                # asgn
  601. 3060:    78                # unmark
  602. L9:
  603. 3064:    67    L10            # mark
  604. 3072:    69                # pnull
  605. 3076:    83    2            # local
  606. 3084:    52                # dup
  607. 3088:    83    3            # local
  608. 3096:    5                # diff
  609. 3100:    1                # asgn
  610. 3104:    78                # unmark
  611. L10:
  612. 3108:    67    L11            # mark
  613. 3116:    69                # pnull
  614. 3120:    83    2            # local
  615. 3128:    52                # dup
  616. 3132:    83    3            # local
  617. 3140:    8                # inter
  618. 3144:    1                # asgn
  619. 3148:    78                # unmark
  620. L11:
  621. 3152:    67    L12            # mark
  622. 3160:    69                # pnull
  623. 3164:    83    4            # local
  624. 3172:    52                # dup
  625. 3176:    83    5            # local
  626. 3184:    3                # cat
  627. 3188:    1                # asgn
  628. 3192:    78                # unmark
  629. L12:
  630. 3196:    67    L13            # mark
  631. 3204:    69                # pnull
  632. 3208:    83    4            # local
  633. 3216:    52                # dup
  634. 3220:    83    5            # local
  635. 3228:    14                # lexlt
  636. 3232:    1                # asgn
  637. 3236:    78                # unmark
  638. L13:
  639. 3240:    67    L14            # mark
  640. 3248:    69                # pnull
  641. 3252:    83    4            # local
  642. 3260:    52                # dup
  643. 3264:    83    5            # local
  644. 3272:    13                # lexle
  645. 3276:    1                # asgn
  646. 3280:    78                # unmark
  647. L14:
  648. 3284:    67    L15            # mark
  649. 3292:    69                # pnull
  650. 3296:    83    4            # local
  651. 3304:    52                # dup
  652. 3308:    83    5            # local
  653. 3316:    10                # lexeq
  654. 3320:    1                # asgn
  655. 3324:    78                # unmark
  656. L15:
  657. 3328:    67    L16            # mark
  658. 3336:    69                # pnull
  659. 3340:    83    4            # local
  660. 3348:    52                # dup
  661. 3352:    83    5            # local
  662. 3360:    11                # lexge
  663. 3364:    1                # asgn
  664. 3368:    78                # unmark
  665. L16:
  666. 3372:    67    L17            # mark
  667. 3380:    69                # pnull
  668. 3384:    83    4            # local
  669. 3392:    52                # dup
  670. 3396:    83    5            # local
  671. 3404:    12                # lexgt
  672. 3408:    1                # asgn
  673. 3412:    78                # unmark
  674. L17:
  675. 3416:    67    L18            # mark
  676. 3424:    69                # pnull
  677. 3428:    83    4            # local
  678. 3436:    52                # dup
  679. 3440:    83    5            # local
  680. 3448:    15                # lexne
  681. 3452:    1                # asgn
  682. 3456:    78                # unmark
  683. L18:
  684. 3460:    67    L19            # mark
  685. 3468:    69                # pnull
  686. 3472:    83    4            # local
  687. 3480:    76                # sdup
  688. 3484:    44                # bscan
  689. 3488:    83    5            # local
  690. 3496:    55                # escan
  691. 3500:    1                # asgn
  692. 3504:    78                # unmark
  693. L19:
  694. 3508:    67    L20            # mark
  695. 3516:    69                # pnull
  696. 3520:    83    6            # local
  697. 3528:    52                # dup
  698. 3532:    83    7            # local
  699. 3540:    9                # lconcat
  700. 3544:    1                # asgn
  701. 3548:    78                # unmark
  702. L20:
  703. 3552:    67    L21            # mark
  704. 3560:    69                # pnull
  705. 3564:    83    8            # local
  706. 3572:    52                # dup
  707. 3576:    83    9            # local
  708. 3584:    7                # eqv
  709. 3588:    1                # asgn
  710. 3592:    78                # unmark
  711. L21:
  712. 3596:    67    L22            # mark
  713. 3604:    69                # pnull
  714. 3608:    83    8            # local
  715. 3616:    52                # dup
  716. 3620:    83    9            # local
  717. 3628:    20                # neqv
  718. 3632:    1                # asgn
  719. 3636:    78                # unmark
  720. L22:
  721. 3640:    67    L23            # mark
  722. 3648:    69                # pnull
  723. 3652:    83    8            # local
  724. 3660:    83    9            # local
  725. 3668:    1                # asgn
  726. 3672:    78                # unmark
  727. L23:
  728. 3676:    67    L24            # mark
  729. 3684:    69                # pnull
  730. 3688:    83    8            # local
  731. 3696:    76                # sdup
  732. 3700:    83    9            # local
  733. 3708:    47                # coact
  734. 3712:    1                # asgn
  735. 3716:    78                # unmark
  736. L24:
  737. 3720:    67    L25            # mark
  738. 3728:    83    10            # local
  739. 3736:    44                # bscan
  740. 3740:    83    8            # local
  741. 3748:    55                # escan
  742. 3752:    78                # unmark
  743. L25:
  744. 3756:    67    L26            # mark
  745. 3764:    83    8            # local
  746. 3772:    70                # pop
  747. 3776:    83    9            # local
  748. 3784:    78                # unmark
  749. L26:
  750. 3788:    67    L27            # mark
  751. 3796:    58    L30            # goto
  752. L28:
  753. 3804:    70                # pop
  754. 3808:    67    L29            # mark
  755. 3816:    83    8            # local
  756. 3824:    49                # coret
  757. 3828:    53                # efail
  758. L29:
  759. 3832:    48                # cofail
  760. 3836:    58    L29            # goto
  761. L30:
  762. 3844:    50    L28            # create
  763. 3852:    78                # unmark
  764. L27:
  765. 3856:    67    L31            # mark
  766. 3864:    67    L32            # mark
  767. 3872:    69                # pnull
  768. 3876:    71                # pret
  769. L32:
  770. 3880:    68                # pfail
  771. 3884:    78                # unmark
  772. L31:
  773. 3888:    67    L33            # mark
  774. 3896:    67    L34            # mark
  775. 3904:    83    8            # local
  776. 3912:    71                # pret
  777. L34:
  778. 3916:    68                # pfail
  779. 3920:    78                # unmark
  780. L33:
  781. 3924:    67    L35            # mark
  782. 3932:    85                # mark0
  783. 3936:    83    8            # local
  784. 3944:    72                # psusp
  785. 3948:    70                # pop
  786. L36:
  787. 3952:    53                # efail
  788. L37:
  789. 3956:    78                # unmark
  790. L35:
  791. 3960:    67    L38            # mark
  792. 3968:    85                # mark0
  793. 3972:    83    8            # local
  794. 3980:    72                # psusp
  795. 3984:    70                # pop
  796. 3988:    85                # mark0
  797. 3992:    83    9            # local
  798. 4000:    78                # unmark
  799. L39:
  800. 4004:    53                # efail
  801. L40:
  802. 4008:    78                # unmark
  803. L38:
  804. 4012:    67    L41            # mark
  805. 4020:    68                # pfail
  806. 4024:    78                # unmark
  807. L41:
  808. 4028:    69                # pnull
  809. 4032:    68                # pfail
  810. 4036:    4
  811.     3
  812.  
  813.      000 000 000 000 000 000 000 000
  814. 4076:    3
  815.  
  816.      140 101 000 000 000 000 000 000
  817.             ( 3.5 )
  818. 4088:    3
  819.  
  820.      303 107 000 120 000 000 000 000
  821.             ( 25000 )
  822. 4100:    3
  823.  
  824.      333 060 376 346 275 316 326 355
  825.             ( 4e-10 )
  826. 4112:    6
  827.     116
  828.     Z+4228
  829.     0
  830.     10
  831.     0
  832.     1
  833.     5    I+64            # expr4
  834.     2    I+84            # e1
  835.     2    I+113            # e2
  836.     1    I+116            # e
  837.     1    I+20            # x
  838.     1    I+87            # i
  839.     1    I+89            # j
  840.     4    I+118            # size
  841.     1    I+111            # s
  842.     2    I+123            # e3
  843.     2    I+126            # X_
  844. 4228:    67    L1            # mark
  845. L2:
  846. 4236:    85                # mark0
  847. 4240:    83    0            # local
  848. 4248:    78                # unmark
  849. 4252:    67    L2            # mark
  850. 4260:    78                # unmark
  851. 4264:    69                # pnull
  852. 4268:    58    L4            # goto
  853. L3:
  854. 4276:    78                # unmark
  855. 4280:    58    L2            # goto
  856. L4:
  857. 4288:    78                # unmark
  858. L1:
  859. 4292:    67    L5            # mark
  860. L6:
  861. 4300:    85                # mark0
  862. 4304:    83    0            # local
  863. 4312:    78                # unmark
  864. 4316:    67    L6            # mark
  865. 4324:    78                # unmark
  866. 4328:    83    1            # local
  867. 4336:    58    L8            # goto
  868. L7:
  869. 4344:    78                # unmark
  870. 4348:    58    L6            # goto
  871. L8:
  872. 4356:    78                # unmark
  873. L5:
  874. 4360:    67    L9            # mark
  875. L10:
  876. 4368:    85                # mark0
  877. 4372:    83    0            # local
  878. 4380:    78                # unmark
  879. 4384:    67    L10            # mark
  880. 4392:    58    L11            # goto
  881. L11:
  882. 4400:    78                # unmark
  883. 4404:    58    L10            # goto
  884. L12:
  885. 4412:    78                # unmark
  886. L9:
  887. 4416:    67    L13            # mark
  888. 4424:    85                # mark0
  889. 4428:    83    2            # local
  890. 4436:    54                # eret
  891. 4440:    67    L15            # mark
  892. 4448:    45                # ccase
  893. 4452:    83    3            # local
  894. 4460:    7                # eqv
  895. 4464:    78                # unmark
  896. 4468:    70                # pop
  897. 4472:    68                # pfail
  898. 4476:    58    L14            # goto
  899. L15:
  900. 4484:    67    L16            # mark
  901. 4492:    45                # ccase
  902. 4496:    67    L17            # mark
  903. 4504:    69                # pnull
  904. 4508:    83    4            # local
  905. 4516:    83    5            # local
  906. 4524:    26                # numgt
  907. 4528:    56                # esusp
  908. 4532:    58    L18            # goto
  909. L17:
  910. 4540:    60    1            # int
  911. L18:
  912. 4548:    7                # eqv
  913. 4552:    78                # unmark
  914. 4556:    70                # pop
  915. 4560:    67    L19            # mark
  916. 4568:    69                # pnull
  917. 4572:    71                # pret
  918. L19:
  919. 4576:    68                # pfail
  920. 4580:    58    L14            # goto
  921. L16:
  922. 4588:    53                # efail
  923. L14:
  924. 4592:    78                # unmark
  925. L13:
  926. 4596:    67    L20            # mark
  927. 4604:    85                # mark0
  928. 4608:    83    6            # local
  929. 4616:    83    7            # local
  930. 4624:    61    1            # invoke
  931. 4632:    54                # eret
  932. 4636:    67    L22            # mark
  933. 4644:    45                # ccase
  934. 4648:    60    1            # int
  935. 4656:    7                # eqv
  936. 4660:    78                # unmark
  937. 4664:    70                # pop
  938. 4668:    60    1            # int
  939. 4676:    58    L21            # goto
  940. L22:
  941. 4684:    70                # pop
  942. 4688:    68                # pfail
  943. L21:
  944. 4692:    78                # unmark
  945. L20:
  946. 4696:    67    L23            # mark
  947. 4704:    85                # mark0
  948. 4708:    83    0            # local
  949. 4716:    78                # unmark
  950. 4720:    83    1            # local
  951. 4728:    78                # unmark
  952. L23:
  953. 4732:    67    L24            # mark
  954. 4740:    67    L25            # mark
  955. 4748:    83    0            # local
  956. 4756:    78                # unmark
  957. 4760:    83    1            # local
  958. 4768:    58    L26            # goto
  959. L25:
  960. 4776:    83    8            # local
  961. L26:
  962. 4784:    78                # unmark
  963. L24:
  964. 4788:    67    L27            # mark
  965. L28:
  966. 4796:    67    L28            # mark
  967. 4804:    83    2            # local
  968. L29:
  969. 4812:    78                # unmark
  970. 4816:    58    L28            # goto
  971. L30:
  972. 4824:    78                # unmark
  973. L27:
  974. 4828:    67    L31            # mark
  975. L32:
  976. 4836:    85                # mark0
  977. 4840:    83    0            # local
  978. L33:
  979. 4848:    78                # unmark
  980. 4852:    58    L32            # goto
  981. L34:
  982. 4860:    78                # unmark
  983. L31:
  984. 4864:    67    L35            # mark
  985. L36:
  986. 4872:    85                # mark0
  987. 4876:    83    0            # local
  988. 4884:    78                # unmark
  989. 4888:    67    L36            # mark
  990. 4896:    83    1            # local
  991. L37:
  992. 4904:    78                # unmark
  993. 4908:    58    L36            # goto
  994. L38:
  995. 4916:    78                # unmark
  996. L35:
  997. 4920:    67    L39            # mark
  998. L40:
  999. 4928:    67    L41            # mark
  1000. 4936:    83    0            # local
  1001. 4944:    78                # unmark
  1002. 4948:    53                # efail
  1003. L41:
  1004. 4952:    67    L40            # mark
  1005. 4960:    69                # pnull
  1006. L42:
  1007. 4964:    78                # unmark
  1008. 4968:    58    L40            # goto
  1009. L43:
  1010. 4976:    78                # unmark
  1011. L39:
  1012. 4980:    67    L44            # mark
  1013. L45:
  1014. 4988:    67    L46            # mark
  1015. 4996:    83    0            # local
  1016. 5004:    78                # unmark
  1017. 5008:    53                # efail
  1018. L46:
  1019. 5012:    67    L45            # mark
  1020. 5020:    83    1            # local
  1021. L47:
  1022. 5028:    78                # unmark
  1023. 5032:    58    L45            # goto
  1024. L48:
  1025. 5040:    78                # unmark
  1026. L44:
  1027. 5044:    67    L49            # mark
  1028. 5052:    85                # mark0
  1029. 5056:    83    0            # local
  1030. 5064:    70                # pop
  1031. L50:
  1032. 5068:    53                # efail
  1033. L51:
  1034. 5072:    78                # unmark
  1035. L49:
  1036. 5076:    67    L52            # mark
  1037. 5084:    85                # mark0
  1038. 5088:    83    0            # local
  1039. 5096:    70                # pop
  1040. 5100:    85                # mark0
  1041. 5104:    83    1            # local
  1042. 5112:    78                # unmark
  1043. L53:
  1044. 5116:    53                # efail
  1045. L54:
  1046. 5120:    78                # unmark
  1047. L52:
  1048. 5124:    67    L55            # mark
  1049. 5132:    83    3            # local
  1050. 5140:    78                # unmark
  1051. L55:
  1052. 5144:    67    L56            # mark
  1053. 5152:    83    9            # local
  1054. 5160:    78                # unmark
  1055. L56:
  1056. 5164:    67    L57            # mark
  1057. 5172:    62    4            # keywd
  1058. 5180:    78                # unmark
  1059. L57:
  1060. 5184:    67    L58            # mark
  1061. 5192:    69                # pnull
  1062. 5196:    78                # unmark
  1063. L58:
  1064. 5200:    67    L59            # mark
  1065. 5208:    77    3,I+129            # str
  1066. 5220:    78                # unmark
  1067. L59:
  1068. 5224:    67    L60            # mark
  1069. 5232:    51    *-1204            # cset
  1070. 5240:    78                # unmark
  1071. L60:
  1072. 5244:    67    L61            # mark
  1073. 5252:    77    1,I+133            # str
  1074. 5264:    78                # unmark
  1075. L61:
  1076. 5268:    67    L62            # mark
  1077. 5276:    77    2,I+135            # str
  1078. 5288:    78                # unmark
  1079. L62:
  1080. 5292:    67    L63            # mark
  1081. 5300:    77    1,I+138            # str
  1082. 5312:    78                # unmark
  1083. L63:
  1084. 5316:    67    L64            # mark
  1085. 5324:    77    1,I+138            # str
  1086. 5336:    78                # unmark
  1087. L64:
  1088. 5340:    67    L65            # mark
  1089. 5348:    60    1            # int
  1090. 5356:    78                # unmark
  1091. L65:
  1092. 5360:    67    L66            # mark
  1093. 5368:    60    999999            # int
  1094. 5376:    78                # unmark
  1095. L66:
  1096. 5380:    67    L67            # mark
  1097. 5388:    60    361            # int
  1098. 5396:    78                # unmark
  1099. L67:
  1100. 5400:    67    L68            # mark
  1101. 5408:    75    *-1340            # real
  1102. 5416:    78                # unmark
  1103. L68:
  1104. 5420:    67    L69            # mark
  1105. 5428:    75    *-1348            # real
  1106. 5436:    78                # unmark
  1107. L69:
  1108. 5440:    67    L70            # mark
  1109. 5448:    75    *-1356            # real
  1110. 5456:    78                # unmark
  1111. L70:
  1112. 5460:    69                # pnull
  1113. 5464:    68                # pfail
  1114. 5468:    3                # record blocks
  1115. 5472:
  1116.     6
  1117.     36
  1118.     _mkrec
  1119.     3
  1120.     -2
  1121.     1
  1122.     1
  1123.     5    I+14            # three
  1124. 5508:
  1125.     6
  1126.     36
  1127.     _mkrec
  1128.     0
  1129.     -2
  1130.     2
  1131.     1
  1132.     4    I+26            # zero
  1133. 5544:
  1134.     6
  1135.     36
  1136.     _mkrec
  1137.     1
  1138.     -2
  1139.     3
  1140.     1
  1141.     3    I+31            # one
  1142. 5580:                    # record/field table
  1143. 5580:
  1144.     0
  1145.     -1
  1146.     -1
  1147.  
  1148. 5592:
  1149.     1
  1150.     -1
  1151.     -1
  1152.  
  1153. 5604:
  1154.     2
  1155.     -1
  1156.     0
  1157.  
  1158. 5616:    1    I+20            # x
  1159. 5624:    1    I+22            # y
  1160. 5632:    1    I+24            # z
  1161. 5640:    22000000006    Z+0            # main
  1162. 5648:    22000000006    Z+5472            # three
  1163. 5656:    22000000006    Z+5508            # zero
  1164. 5664:    22000000006    Z+5544            # one
  1165. 5672:    20000000000    0            # line
  1166. 5680:    20000000000    0            # count
  1167. 5688:    22000000006    Z+40            # expr1
  1168. 5696:    22000000006    Z+832            # expr2
  1169. 5704:    22000000006    Z+2544            # expr3
  1170. 5712:    22000000006    Z+4112            # expr4
  1171. 5720:    4    I+0            # main
  1172. 5728:    5    I+14            # three
  1173. 5736:    4    I+26            # zero
  1174. 5744:    3    I+31            # one
  1175. 5752:    4    I+35            # line
  1176. 5760:    5    I+40            # count
  1177. 5768:    5    I+46            # expr1
  1178. 5776:    5    I+52            # expr2
  1179. 5784:    5    I+58            # expr3
  1180. 5792:    5    I+64            # expr4
  1181. 5800:    0    0
  1182. 5808:    155 141 151 156 000 125 070 056
  1183. 5808:    060 056 060 060 062 000 164 150
  1184. 5808:    162 145 145 000 170 000 171 000
  1185. 5808:    172 000 172 145 162 157 000 157
  1186. 5808:    156 145 000 154 151 156 145 000
  1187. 5808:    143 157 165 156 164 000 145 170
  1188. 5808:    160 162 061 000 145 170 160 162
  1189. 5808:    062 000 145 170 160 162 063 000
  1190. 5808:    145 170 160 162 064 000 160 162
  1191. 5808:    157 164 157 056 151 143 156 000
  1192. 5808:    141 000 142 000 145 061 000 151
  1193. 5808:    000 152 000 143 061 000 143 062
  1194. 5808:    000 163 061 000 163 062 000 141
  1195. 5808:    061 000 141 062 000 153 000 163
  1196. 5808:    000 145 062 000 145 000 163 151
  1197. 5808:    172 145 000 145 063 000 130 137
  1198. 5808:    000 141 142 143 000 012 000 136
  1199. 5808:    141 000 001 000
  1200. size:     6796
  1201. trace:     0
  1202. records: 5468
  1203. ftab:     5580
  1204. fnames:  5616
  1205. globals: 5640
  1206. gnames:  5720
  1207. statics: 5800
  1208. strcons:   6656
  1209. filenms:   5808
  1210. linenums:   5816
  1211. config:   I8.0.001
  1212.